Imports Microsoft.VisualBasic

Public Class Profesion
    Private _id As Integer
    Private _descripcion As String
    
    Public Sub New(ByVal descripcion As String, Optional ByVal id As Integer = 0)

        Me._id = id
        Me._descripcion = descripcion
    End Sub

    Public Property ID() As Integer
        Get
            Return _id
        End Get

        Set(ByVal value As Integer)
            _id = value
        End Set
    End Property

    Public Property Descripcion() As String
        Get
            Return _descripcion
        End Get

        Set(ByVal value As String)
            _descripcion = value
        End Set
    End Property

End Class
